home *** CD-ROM | disk | FTP | other *** search
/ Designer's Club 1997 September / Designer's Club 1997 September.iso / pc / IDEASRC / Main.DIR / 00011.ls < prev    next >
Encoding:
Text File  |  1997-08-01  |  1.0 KB  |  51 lines
  1. on mouseDown
  2.   repeat while the mouseDown
  3.     set the memberNum of sprite 10 to 4
  4.     updateStage()
  5.   end repeat
  6.   if sprite 10 intersects 2 then
  7.     puppetSound(2, "godisway")
  8.     go(1, "vrattle")
  9.     exit
  10.   end if
  11.   if sprite 10 intersects 3 then
  12.     puppetSound(2, "godisway")
  13.     go(1, "whale")
  14.   end if
  15.   if sprite 10 intersects 4 then
  16.     puppetSound(2, "godisway")
  17.     go(1, "tree")
  18.   end if
  19.   if sprite 10 intersects 5 then
  20.     puppetSound(2, "godisway")
  21.     go(1, "bugs")
  22.   end if
  23.   if sprite 10 intersects 6 then
  24.     puppetSound(2, "godisway")
  25.     go(1, "gallery")
  26.   end if
  27.   if sprite 10 intersects 7 then
  28.     puppetSound(2, "godisway")
  29.     go("interface")
  30.     exit
  31.   end if
  32.   if sprite 10 intersects 8 then
  33.     puppetSound(2, "godisway")
  34.     go("credits")
  35.     exit
  36.   end if
  37.   if sprite 10 intersects 9 then
  38.     if soundBusy(2) then
  39.       sound stop 2
  40.     else
  41.       puppetSound(2, "help")
  42.     end if
  43.   end if
  44.   if sprite 10 intersects 11 then
  45.     sound stop 1
  46.     sound stop 2
  47.     sound stop 3
  48.     go(1, "quit")
  49.   end if
  50. end
  51.